
 
 '   D e m o     L o a d   T X T   F i l e 
 
 
 
 L o a d   s 1   S e t u p F i l e . t x t 
 
 
 
 C o n t r o l s   O p e n T e x t B o x 
 
 C o n t r o l s   C l e a r T e x t B o x   
 
 P r i n t   C R L F 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   g e t   n u m b e r   o f   l i n e s 
 
 v 1   =   G e t S e p a r a t e d S t r i n g C o u n t ( s 1 ,   C R L F ) 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   f o r   e a c h   l i n e . . . 
 
 F o r   v 2   =   0   T o   v 1 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   g e t   t h e   l i n e   t o   s 2 
 
 	 s 2   =   G e t S e p a r a t e d S t r i n g ( s 1 ,   v 2 ,   C R L F ) 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   i f   t h e   l i n e   i s   n o t   e m p t y 
 
 	 I f   s 2   < >   " " 
 
 	 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   p r i n t   t h e   l i n e 
 
 	 	 P r i n t   s 2   +   C R L F 
 
 	 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   g e t   t h e   v a l u e   t o   s 2 
 
 	 	 s 2   =   G e t S e p a r a t e d S t r i n g ( s 2 ,   2 ) 
 
 	 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   p r i n t   t h e   v a l u e 
 
 	 	 P r i n t   s 2   +   C R L F   +   C R L F 
 
 	 E n d I f 
 
 N e x t 
 
 S t o p 
 
 
 
 
 
 ' W A T C H   v 1 
 
 ' W A T C H   s 2 
 
 ' W A T C H   s 1 
 
 ' E X E C   G o s u b   t e s t 2 
 
 